
         org  $1000

         movea.l #alpha,a0
         move.w  #9,d7
         move.b #$ab,d0
x1       move.b  d0,(a0)+
         dbra    d7,x1
         nop






         org  $10a0
alpha    ds.b 10